(set_window_width): Don't delete root window for being too narrow.

diff --git a/src/window.c b/src/window.c
index 9515c1ca082c9f1364150e985fc586ab993bb867..19d2cc54172efa15125361f1f39ca797b7d2c610 100644 (file)
--- a/src/window.c
+++ b/src/window.c
@@ -1534,7 +1534,7 @@ set_window_width (window, width, nodelete)
   int left, pos, lastright, opos, lastoright;
   Lisp_Object child;
 
-  if (!nodelete && width < window_min_width)
+  if (!nodelete && width < window_min_width && !NILP (w->parent))
     {
       Fdelete_window (window);
       return;